Software of the Month Club 1998 March/Software of the Month Club 1998 March.iso/pc/win/edu/solar/solar.exe/0/RCDATA/TFRMOPTIONS/TFRMOPTIONS.txt

Text File | 1997-11-30 | 8KB | 336 lines

object frmOptions: TfrmOptions
  Left = 371
  Top = 199
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Options'
  ClientHeight = 393
  ClientWidth = 473
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 120
  TextHeight = 16
  object butOK: TButton
    Left = 240
    Top = 361
    Width = 98
    Height = 27
    Caption = '&OK'
    Default = True
    TabOrder = 1
    OnClick = butOKClick
  end
  object butCancel: TButton
    Left = 352
    Top = 361
    Width = 98
    Height = 27
    Cancel = True
    Caption = '&Cancel'
    TabOrder = 2
    OnClick = butCancelClick
  end
  object PageControl1: TPageControl
    Left = 9
    Top = 9
    Width = 456
    Height = 336
    ActivePage = TabSheet1
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = 'General'
      object grpTime: TRadioGroup
        Left = 9
        Top = 9
        Width = 192
        Height = 96
        Caption = 'Time Tracking'
        ItemIndex = 0
        Items.Strings = (
          '&Ellapsed'
          '&Relative')
        TabOrder = 0
      end
      object grpUniverse: TGroupBox
        Left = 9
        Top = 112
        Width = 432
        Height = 89
        Caption = 'Universe Type'
        TabOrder = 2
        object Label1: TLabel
          Left = 9
          Top = 25
          Width = 128
          Height = 17
          AutoSize = False
          Caption = 'Gravity varies as:       (k)(r)�'
        end
        object Label2: TLabel
          Left = 65
          Top = 57
          Width = 53
          Height = 17
          AutoSize = False
          Caption = 'Where &k = '
          FocusControl = editK
        end
        object Label3: TLabel
          Left = 272
          Top = 57
          Width = 39
          Height = 17
          AutoSize = False
          Caption = '&and � = '
          FocusControl = editX
        end
        object editK: TEdit
          Left = 137
          Top = 52
          Width = 88
          Height = 24
          TabOrder = 0
          Text = '1'
        end
        object editX: TEdit
          Left = 329
          Top = 52
          Width = 88
          Height = 24
          TabOrder = 1
          Text = '-2'
        end
      end
      object grpSize: TGroupBox
        Left = 9
        Top = 208
        Width = 432
        Height = 57
        Caption = 'Body Size'
        TabOrder = 3
        object Label4: TLabel
          Left = 9
          Top = 25
          Width = 288
          Height = 16
          AutoSize = False
          Caption = 'Enlarge all &objects'#39' viewed sizes by a factor of:'
          FocusControl = editSize
          WordWrap = True
        end
        object editSize: TEdit
          Left = 304
          Top = 21
          Width = 57
          Height = 24
          TabOrder = 0
          Text = '1'
        end
      end
      object grpCoSys: TRadioGroup
        Left = 208
        Top = 9
        Width = 233
        Height = 96
        Caption = 'Coordinate System'
        ItemIndex = 0
        Items.Strings = (
          'Car&tesian'
          '&Cylindreical Polar'
          '&Spherical Polar')
        TabOrder = 1
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'Units'
      object GroupBox1: TGroupBox
        Left = 9
        Top = 9
        Width = 240
        Height = 176
        Caption = 'Distance'
        TabOrder = 0
        object Radiom: TRadioButton
          Left = 9
          Top = 25
          Width = 128
          Height = 16
          Caption = 'Meters (m)'
          Checked = True
          TabOrder = 0
          TabStop = True
          OnClick = RadiomClick
        end
        object Radiokm: TRadioButton
          Left = 9
          Top = 48
          Width = 128
          Height = 17
          Caption = 'Kilometers (km)'
          TabOrder = 1
          OnClick = RadiomClick
        end
        object Radiokm2: TRadioButton
          Left = 9
          Top = 73
          Width = 120
          Height = 16
          Caption = 'Kilometers x 10^'
          TabOrder = 2
          OnClick = Radiokm2Click
        end
        object UpDown1: TUpDown
          Left = 178
          Top = 68
          Width = 20
          Height = 24
          Associate = editDistExponent
          Min = -1000
          Max = 1000
          Position = 1
          TabOrder = 3
          Wrap = False
        end
        object editDistExponent: TEdit
          Left = 130
          Top = 68
          Width = 48
          Height = 24
          TabOrder = 4
          Text = '1'
          OnChange = editDistExponentChange
        end
        object Radiomi: TRadioButton
          Left = 9
          Top = 96
          Width = 144
          Height = 17
          Caption = 'Miles (mi)'
          TabOrder = 5
          OnClick = RadiomClick
        end
        object RadioAU: TRadioButton
          Left = 9
          Top = 121
          Width = 176
          Height = 16
          Caption = 'Astronomical Units (AU)'
          TabOrder = 6
          OnClick = RadiomClick
        end
        object RadioLY: TRadioButton
          Left = 9
          Top = 144
          Width = 176
          Height = 17
          Caption = 'Light Years (LY)'
          TabOrder = 7
          OnClick = RadiomClick
        end
      end
      object RadioGrpVel: TRadioGroup
        Left = 256
        Top = 9
        Width = 185
        Height = 96
        Caption = 'Velocity'
        ItemIndex = 0
        Items.Strings = (
          'm/s'
          'km/s'
          'km/h')
        TabOrder = 2
      end
      object GroupBox2: TGroupBox
        Left = 9
        Top = 192
        Width = 240
        Height = 105
        Caption = 'Mass'
        TabOrder = 1
        object Radiokg: TRadioButton
          Left = 9
          Top = 25
          Width = 112
          Height = 16
          Caption = 'Kilograms (kg)'
          Checked = True
          TabOrder = 0
          TabStop = True
          OnClick = RadioEMClick
        end
        object RadioKG2: TRadioButton
          Left = 9
          Top = 48
          Width = 120
          Height = 17
          Caption = 'Kilograms x 10^'
          TabOrder = 1
          OnClick = RadioKG2Click
        end
        object UpDown2: TUpDown
          Left = 178
          Top = 44
          Width = 20
          Height = 24
          Associate = editMassExponent
          Min = -1000
          Max = 1000
          Position = 1
          TabOrder = 2
          Wrap = False
        end
        object editMassExponent: TEdit
          Left = 130
          Top = 44
          Width = 48
          Height = 24
          TabOrder = 3
          Text = '1'
          OnChange = editMassExponentChange
        end
        object RadioEM: TRadioButton
          Left = 9
          Top = 73
          Width = 152
          Height = 16
          Caption = 'Earth Masses (EM)'
          TabOrder = 4
          OnClick = RadioEMClick
        end
      end
      object RadioGrpRadius: TRadioGroup
        Left = 256
        Top = 112
        Width = 185
        Height = 97
        Caption = 'Radius'
        ItemIndex = 0
        Items.Strings = (
          'Meters (m)'
          'Kilometers (km)'
          'Earth Radii (ER)')
        TabOrder = 3
      end
      object RadioGrpAngle: TRadioGroup
        Left = 256
        Top = 217
        Width = 185
        Height = 80
        Caption = 'Angles'
        ItemIndex = 0
        Items.Strings = (
          'Degrees (deg)'
          'Radians (rad)')
        TabOrder = 4
      end
    end
  end
end